home *** CD-ROM | disk | FTP | other *** search
/ Revista do CD-ROM 101 / CD-ROM 101.iso / compl / maya5ple / Install_MayaPLE5_English.exe / Maya / Data1.cab / jasperCallback.mel < prev    next >
Encoding:
Text File  |  2003-07-17  |  27.2 KB  |  965 lines
  1. // Copyright (C) 1997-2002 Alias|Wavefront,
  2. // a division of Silicon Graphics Limited.
  3. //
  4. // The information in this file is provided for the exclusive use of the
  5. // licensees of Alias|Wavefront.  Such users have the right to use, modify,
  6. // and incorporate this code into other products for purposes authorized
  7. // by the Alias|Wavefront license agreement, without fee.
  8. //
  9. // ALIAS|WAVEFRONT DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
  10. // INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
  11. // EVENT SHALL ALIAS|WAVEFRONT BE LIABLE FOR ANY SPECIAL, INDIRECT OR
  12. // CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
  13. // DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
  14. // TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
  15. // PERFORMANCE OF THIS SOFTWARE.
  16. //
  17. // ================= Callbacks for each section ======================
  18. global proc jasperTabMenuChange( 
  19.     string $jasperCommand, 
  20.     string $parent 
  21. )
  22. {
  23.     string $currentTab = `tabLayout -query -selectTab $parent`;
  24.  
  25.     if( $currentTab == "Sculpt" 
  26.         || $currentTab == "Weight"
  27.         || $currentTab == "Script_Paint"
  28.         || attrPaintInstCheckCurrentTab($currentTab) )
  29.     {
  30.         string $cmd;
  31.  
  32.         $cmd = ($jasperCommand + " -q -brushoperate `currentCtx`");
  33.         string $type = `eval $cmd`;
  34.         if ( ( $type != "paint" )
  35.              && ( eval( "floatSliderGrp -ex commEdgesTol" ) )
  36.              && ( eval( "floatSliderGrp -ex collapseCVTol" ) ) ) 
  37.         {
  38.             $cmd = $jasperCommand + "-e -brushoperate \"paint\" `currentCtx`";
  39.             eval $cmd;
  40.             updateCommEdgeDisplayScreen $jasperCommand;
  41.             radioButtonGrp -e -sl 1 brushOperationType;
  42.         }
  43.     } 
  44. }
  45.  
  46. global proc updateBrushShapeIcons( 
  47.     string $selectType 
  48. )
  49. {
  50.     symbolCheckBox -e -v false bsCirclePoly;
  51.     symbolCheckBox -e -v false bsCircleGaus;
  52.     symbolCheckBox -e -v false bsCircleSolid;
  53.     symbolCheckBox -e -v false bsSemiCirclePoly;
  54.     symbolCheckBox -e -v false bsSemiCircleSolid;
  55.     symbolCheckBox -e -v false bsRect;
  56.     symbolCheckBox -e -v false bsLineH;
  57.     symbolCheckBox -e -v false bsLineV;
  58.  
  59.     switch( $selectType ) {
  60.     case "-byCirclePoly":
  61.         symbolCheckBox -e -v true  bsCirclePoly;
  62.         break;
  63.     case "-byCircleGaus":
  64.         symbolCheckBox -e -v true  bsCircleGaus;
  65.         break;
  66.     case "-byCircleSolid":
  67.         symbolCheckBox -e -v true  bsCircleSolid;
  68.         break;
  69.     case "-bySemiCirclePoly":
  70.         symbolCheckBox -e -v true  bsSemiCirclePoly;
  71.         break;
  72.     case "-bySemiCircleSolid":
  73.         symbolCheckBox -e -v true  bsSemiCircleSolid;
  74.         break;
  75.     case "-byRect":
  76.         symbolCheckBox -e -v true  bsRect;
  77.         break;
  78.     case "-byLineH":
  79.         symbolCheckBox -e -v true  bsLineH;
  80.         break;
  81.     case "-byLineV":
  82.         symbolCheckBox -e -v true  bsLineV;
  83.         break;
  84.     }
  85. }
  86.  
  87. global proc resetTabletAttr( )
  88. {
  89.     // initialize the scaling factor for tablet variable
  90.     setInputDeviceMapping -d "tablet" -ax "pen:tilt:X" -s 1 -o 0 -a  -w ;
  91.     setInputDeviceMapping -d "tablet" -ax "pen:tilt:Y" -s 1 -o 0 -a  -w ;
  92.     setInputDeviceMapping -d "tablet" -ax "pen:penID"  -s 1 -o 0 -a  -w ;
  93. }
  94.  
  95. global proc jasperSetLowerRadius( string $jasperCommand )
  96. {
  97.     float $radius      = `floatSliderGrp -q -v radius`;
  98.     float $lowerRadius = `floatSliderGrp -q -v lowerRadius`;
  99.  
  100.     if( $lowerRadius > $radius ) {
  101.         floatSliderGrp -e -v $radius lowerRadius;
  102.     }
  103. }
  104.  
  105.  
  106. global proc jasperSetRadius( string $jasperCommand )
  107. {
  108.     float $radius      = `floatSliderGrp -q -v radius`;
  109.     float $lowerRadius = `floatSliderGrp -q -v lowerRadius`;
  110.  
  111.     if( $lowerRadius > $radius ) {
  112.         floatSliderGrp -e -v $lowerRadius radius;
  113.     }
  114. }
  115.  
  116. global proc jasperStampProfileCallback( 
  117.     string $jasperCommand,
  118.     string $parent,
  119.     string $currentTool 
  120. )
  121. {
  122.     // 
  123.     // Profile frameLayout
  124.     //
  125.     floatSliderGrp -e -cc ($jasperCommand + " -e -lowerradius #1 `currentCtx`")
  126.         -dc ( "jasperSetLowerRadius " + $jasperCommand ) 
  127.         lowerRadius;
  128.     floatSliderGrp -e -cc ($jasperCommand + " -e -radius #1 `currentCtx`")
  129.         -dc ( "jasperSetRadius " + $jasperCommand ) 
  130.         radius;
  131.  
  132.  
  133.     if ( ( $currentTool != "selectPaint" ) && ( $currentTool != "setEditPaint" ) ) {
  134.         floatSliderGrp -e
  135.             -cc ($jasperCommand + " -e -opacity #1 `currentCtx`")
  136.             opacitySlider;
  137.  
  138.         if ( $currentTool == "wtPaint" || $currentTool == "userPaint"
  139.              || $currentTool == "attrPaint"
  140.              || attrPaintInstCheckTool( $currentTool ) )
  141.         {
  142.             floatSliderGrp -e
  143.                 -cc ($jasperCommand + " -e -color #1 #1 #1 `currentCtx`")
  144.                 colorSlider;
  145.         }
  146.  
  147.         button -e
  148.             -c   ($jasperCommand + " -e -clear `currentCtx`" )
  149.             floodButton;
  150.     }
  151.  
  152.  
  153.     symbolCheckBox -e
  154.         -cc ($jasperCommand + " -e -brushshape circle1 `currentCtx`; updateBrushShapeIcons -byCirclePoly") 
  155.         bsCirclePoly;
  156.     symbolCheckBox -e
  157.         -cc ($jasperCommand + " -e -brushshape circle2 `currentCtx`; updateBrushShapeIcons -byCircleGaus") 
  158.         bsCircleGaus;
  159.     symbolCheckBox -e
  160.         -cc ($jasperCommand + " -e -brushshape circle3 `currentCtx`; updateBrushShapeIcons -byCircleSolid") 
  161.         bsCircleSolid;
  162.     symbolCheckBox -e
  163.         -cc ($jasperCommand + " -e -brushshape semiCircle1 `currentCtx`; updateBrushShapeIcons -bySemiCirclePoly") 
  164.         bsSemiCirclePoly;
  165.     symbolCheckBox -e
  166.         -cc ($jasperCommand + " -e -brushshape semiCircle2 `currentCtx`; updateBrushShapeIcons -bySemiCircleSolid") 
  167.         bsSemiCircleSolid;
  168.     symbolCheckBox -e
  169.         -cc ($jasperCommand + " -e -brushshape rectangle `currentCtx`; updateBrushShapeIcons -byRect") 
  170.         bsRect;
  171.     symbolCheckBox -e
  172.         -cc ($jasperCommand + " -e -brushshape lineH `currentCtx`; updateBrushShapeIcons -byLineH") 
  173.         bsLineH;
  174.     symbolCheckBox -e
  175.         -cc ($jasperCommand + " -e -brushshape lineV `currentCtx`; updateBrushShapeIcons -byLineV") 
  176.         bsLineV;
  177.  
  178. }
  179.  
  180.  
  181. global proc jasperValueCallback( 
  182.     string $jasperCommand, 
  183.     string $parent,
  184.     string $currentTool,
  185.     int    $extendValue,
  186.     string $extendValueCallback
  187. )
  188. {
  189.     //
  190.     //    Stamp Profile frameLayout
  191.     //
  192.     jasperStampProfileCallback( $jasperCommand, $parent, $currentTool );
  193.  
  194.  
  195.     //
  196.     //    Operation frameLayout
  197.     //
  198.     radioButtonGrp -e
  199.         -on1 ($jasperCommand + " -e -edittype \"absolute\" `currentCtx`")
  200.         -on2 ($jasperCommand + " -e -edittype \"additive\" `currentCtx`")
  201.         -on3 ($jasperCommand + " -e -edittype \"scale\" `currentCtx`")
  202.         -on4 ($jasperCommand + " -e -edittype \"smooth\" `currentCtx`")
  203.         op0Radio;
  204.  
  205.  
  206.     //
  207.     //    Weight Painting frameLayout
  208.     //
  209.     floatSliderGrp -e
  210.         -cc ($jasperCommand + " -e -offset #1 `currentCtx`")
  211.         ptOffset;
  212.     floatSliderGrp -e
  213.         -cc ($jasperCommand + " -e -mult #1 `currentCtx`")
  214.         ptMult;
  215.  
  216.  
  217.     //
  218.     //    Clamping frameLayout
  219.     //
  220.     radioButtonGrp -e
  221.         -on1 ($jasperCommand + " -e -clamp \"none\" `currentCtx`")
  222.         -on2 ($jasperCommand + " -e -clamp \"both\" `currentCtx`")
  223.         -on3 ($jasperCommand + " -e -clamp \"lower\" `currentCtx`")
  224.         -on4 ($jasperCommand + " -e -clamp \"upper\" `currentCtx`")
  225.         clampRadio;
  226.  
  227.     floatSliderGrp -e
  228.         -cc ($jasperCommand + " -e -clamplower #1 `currentCtx`")
  229.         clLower;
  230.     floatSliderGrp -e
  231.         -cc ($jasperCommand + " -e -clampupper #1 `currentCtx`")
  232.         clUpper;
  233.     
  234. // OBSOLETE
  235. /*
  236.     if ( $currentTool == "wtPaint" ) {
  237.         textScrollList -e
  238.             -sc ("weightScrollListClick " + $jasperCommand )                   
  239.         weightScrollList;
  240.     }
  241. */
  242.  
  243.     if( $extendValue )
  244.     {
  245.         string $cmd = $extendValueCallback + " " + $jasperCommand + " "
  246.             + $parent + " "    + $currentTool;
  247.         eval $cmd;
  248.     }
  249. }
  250.  
  251.  
  252. // OBSOLETE
  253. /*
  254. global proc weightScrollListClick(
  255.     string $jasperCommand
  256. )
  257. {
  258.     string $clusterNames[] = eval("textScrollList -q -si weightScrollList");
  259.     string $name = $clusterNames[0];
  260.  
  261.     string $cmd = $jasperCommand + " -e -setnodename " + $name + " `currentCtx`";
  262.     eval( $cmd );
  263. }
  264. */
  265.  
  266.  
  267. proc jasperStrokeCallback( 
  268.     string $jasperCommand,
  269.     string $currentTool
  270. )
  271. {        
  272.     //
  273.     //    Reflect Paint frameLayout
  274.     //
  275.     updateReflectionChBox( $jasperCommand );
  276.     checkBoxGrp -e
  277.         -cc1 ($jasperCommand + " -e -reflectpaint #1 `currentCtx`" )
  278.         reflectStrokeChkBox;
  279.  
  280.     radioButtonGrp -e
  281.          -on1 ($jasperCommand + " -e -reflectpainttype \"reflectU\" `currentCtx`") 
  282.         refPaint0Radio;
  283.     radioButtonGrp -e
  284.          -on1 ($jasperCommand + " -e -reflectpainttype \"reflectV\" `currentCtx`") 
  285.         refPaint1Radio;
  286.     if ( $currentTool != "paintColor" ) {
  287.         radioButtonGrp -e
  288.          -on1 ($jasperCommand + " -e -reflectpainttype \"reflectMult\" `currentCtx`") 
  289.         refPaint2Radio;
  290.     }
  291.  
  292.       floatSliderGrp -e
  293.         -cc ($jasperCommand + " -e -reflectalongu #1 `currentCtx`") 
  294.         singleUSlider;
  295.  
  296.       floatSliderGrp -e
  297.         -cc ($jasperCommand + " -e -reflectalongv #1 `currentCtx`")
  298.         singleVSlider;
  299.  
  300.     button -e 
  301.         -c ($jasperCommand + " -e -reflectalongu 0.5 `currentCtx`") 
  302.         reflectUButton;
  303.  
  304.     button -e 
  305.         -c ($jasperCommand + " -e -reflectalongv 0.5 `currentCtx`") 
  306.         reflectVButton;
  307.  
  308.     if ( $currentTool == "putty" ) {
  309.         checkBoxGrp -e
  310.             -cc1 ($jasperCommand + " -e -invertrefvector #1 `currentCtx`")
  311.             invertVectorChkBox;
  312.     }
  313.  
  314.  
  315.     //
  316.     //    Stylus Pressure frameLayout
  317.     //
  318.     radioButtonGrp -e
  319.         -on1 ($jasperCommand + " -e -pressure \"none\" `currentCtx`")
  320.         -on2 ($jasperCommand + " -e -pressure \"opacity\" `currentCtx`")
  321.         -on3 ($jasperCommand + " -e -pressure \"radius\" `currentCtx`")
  322.         -on4 ($jasperCommand + " -e -pressure \"both\" `currentCtx`")
  323.         pressure0Radio;
  324.  
  325.  
  326.     //
  327.     //    Profile Alignment frameLayout
  328.     //
  329.     radioButtonGrp -e
  330.         -on1 ($jasperCommand + " -e -crt \"utangent\" `currentCtx`")
  331.         -on2 ($jasperCommand + " -e -crt \"vtangent\" `currentCtx`")
  332.         compRef0Radio;
  333.     radioButtonGrp -e
  334.         -on1 ($jasperCommand + " -e -crt \"upvector\" `currentCtx`")
  335.         -on2 ($jasperCommand + " -e -crt \"pathvector\" `currentCtx`")
  336.         compRef1Radio;
  337. }
  338.  
  339.  
  340. proc jasperSeamCallback( 
  341.     string $jasperCommand,
  342.     string $currentTool
  343. )
  344. {
  345.     // display only if nurbs are present
  346.     // 
  347.     updateSeamProperties( $jasperCommand );
  348.  
  349.  
  350.     if ( $currentTool == "putty" || $currentTool == "wtPaint" 
  351.          || $currentTool == "userPaint" || $currentTool == "attrPaint" 
  352.          || attrPaintInstCheckTool($currentTool) ) 
  353.     {
  354.  
  355.         //
  356.         //    Brush Mode frameLayout
  357.         //
  358.         radioButtonGrp -e
  359.             -on1 ($jasperCommand + " -e -brushoperate \"paint\" `currentCtx`; updateCommEdgeDisplayScreen " + $jasperCommand )
  360.             -on2 ($jasperCommand + " -e -brushoperate \"selectedge\" `currentCtx`; updateCommEdgeDisplayScreen " + $jasperCommand )
  361.             -on3 ($jasperCommand + " -e -brushoperate \"selectcorner\" `currentCtx`; updateCommEdgeDisplayScreen " + $jasperCommand )
  362.             brushOperationType;
  363.  
  364.         //
  365.         //    Seam AutoCreation frameLayout
  366.         //
  367.         floatSliderGrp -e
  368.             -cc ($jasperCommand + " -e -commedgetol #1 `currentCtx`")
  369.             commEdgesTol;
  370.         
  371.         floatSliderGrp -e
  372.             -cc ($jasperCommand + " -e -commedgeminlength #1 `currentCtx`")
  373.             commEdgesMinLength;
  374.  
  375.         //
  376.         //    Common Edge/Corner frameLayout
  377.         //
  378.         radioButtonGrp -e
  379.             -on1 ($jasperCommand + " -e -commedgedisplay \"off\" `currentCtx`; updateCommEdgeDisplayScreen " + $jasperCommand ) 
  380.             commEdgesDisplay0;
  381.         radioButtonGrp -e
  382.             -on1 ($jasperCommand + " -e -commedgedisplay \"one\" `currentCtx`; updateCommEdgeDisplayScreen " + $jasperCommand ) 
  383.         commEdgesDisplay1;
  384.         radioButtonGrp -e
  385.             -on1 ($jasperCommand + " -e -commedgedisplay \"all\" `currentCtx`; updateCommEdgeDisplayScreen " + $jasperCommand ) 
  386.             commEdgesDisplay2;
  387.         
  388.         button -e
  389.             -c ($jasperCommand + " -e -commedgedisplaynext `currentCtx`; updateCommEdgeOneDisplayScreen " + $jasperCommand ) 
  390.             commEdgeDisplayOneNext;
  391.         button -e
  392.         -c ($jasperCommand + " -e -commedgedisplayprev `currentCtx`; updateCommEdgeOneDisplayScreen " + $jasperCommand ) 
  393.             commEdgeDisplayOnePrev;
  394.         
  395.         radioButtonGrp -e
  396.             -on1 ($jasperCommand + " -e -ccd \"off\" `currentCtx` " ) 
  397.             commCornerDisplay0;
  398.         
  399.         radioButtonGrp -e
  400.             -on1 ($jasperCommand + " -e -ccd \"all\" `currentCtx` " ) 
  401.             commCornerDisplay1;
  402.     }
  403.  
  404.     floatSliderGrp -e
  405.         -cc ($jasperCommand + " -e -collapsecvtol #1 `currentCtx`")
  406.         collapseCVTol;
  407.  
  408.     //
  409.     //    Stitching Mode frameLayout
  410.     //        - this is only displayed in the puttyContext
  411.     //
  412.     if ( $currentTool == "putty" ) {
  413.  
  414.         radioButtonGrp -e
  415.             -on1 ($jasperCommand + " -e -stitchtype \"off\" `currentCtx`")
  416.             -on2 ($jasperCommand + " -e -stitchtype \"pos\" `currentCtx`")
  417.             -on3 ($jasperCommand + " -e -stitchtype \"tan\" `currentCtx`")
  418.             stitchTypeRadio;
  419.  
  420.         checkBoxGrp -e
  421.             -cc1 ($jasperCommand + " -e -stitchcorner #1 `currentCtx`")
  422.             stitchCornerChkBox;
  423.  
  424.         checkBoxGrp -e
  425.             -cc1 ($jasperCommand + " -e -polecv #1 `currentCtx`")
  426.             stitchPoleCVChkBox;
  427.  
  428.         button -e
  429.             -c ($jasperCommand + " -e -stitchedgeflood `currentCtx`" )
  430.             stitchNowButton;
  431.     }
  432.     //
  433.     // Common Edge Value Averaging
  434.     // - this is only displayed if we are in wtPaint or userPaint
  435.     //
  436.     else if ( $currentTool == "wtPaint" || $currentTool == "userPaint"
  437.               || $currentTool == "attrPaint"
  438.               || attrPaintInstCheckTool( $currentTool ) )
  439.     {
  440.         checkBoxGrp -e
  441.             -cc1 ($jasperCommand + " -e -averageedges #1 `currentCtx`")
  442.             averageEdgeValues;
  443.  
  444.         checkBoxGrp -e
  445.             -cc1 ($jasperCommand + " -e -averagepolecv #1 `currentCtx`")
  446.             averagePoleCVValues;
  447.     }
  448. }
  449.  
  450.  
  451.  
  452. proc jasperMaskCallback( 
  453.     string $jasperCommand 
  454. )
  455. {
  456.     //
  457.     //    CV Mask frameLayout
  458.     //
  459.     radioButtonGrp -e
  460.         -on1 ($jasperCommand + " -e -maskcv \"off\" `currentCtx`")
  461.         -on2 ($jasperCommand + " -e -maskcv \"select\" `currentCtx`")
  462.         -on3 ($jasperCommand + " -e -maskcv \"unselect\" `currentCtx`")
  463.         cvMaskType;
  464.  
  465.     checkBoxGrp -e
  466.         -cc1 ($jasperCommand + " -e -displaycv #1 `currentCtx`")
  467.         cvMaskDisplay;
  468. }
  469.  
  470.  
  471. proc string imageDirectoryName( )
  472. {
  473. //     string $dirNames[] = `workspace -q -rt`;
  474. //     string $imageDir   = `workspace -q -fn`;
  475.  
  476. //     for ($i=0; $i < size($dirNames); ++$i) {
  477. //         if ( $dirNames[$i] == "sourceImages" ) {
  478. //             if ( ( $i+1 < size($dirNames) )  && ( $dirNames[$i+1] != "images" ) ) {
  479. //                 $imageDir = $imageDir + "/" + $dirNames[$i+1];    
  480. //             }
  481. //             break;
  482. //         }
  483. //     }
  484.     string $imageDir   = `workspace -q -fn`;
  485.  
  486.     return $imageDir;
  487. }
  488.  
  489.  
  490. global proc int jasperImportAttributeMapCB(
  491.     string $jasperCommand,
  492.     string $fileName,
  493.     string $fileType
  494. )
  495. {
  496.     // display the file name in the text field
  497.     textFieldGrp -e -fileName $fileName importMapNameField;
  498.     updateReloadButton( $jasperCommand );
  499.  
  500.     // execute the jasper command to load the file
  501.     string $dirName = imageDirectoryName();
  502.  
  503.     eval($jasperCommand + " -e -importfilename \"" + $fileName + "\" `currentCtx`");
  504.     eval($jasperCommand + " -e -importfileload \"" + $dirName + "\" `currentCtx`");
  505.  
  506.     // return true to close the filebrowser
  507.     return true;
  508. }
  509.  
  510. global proc int jasperExportAttributeMapCB(
  511.     string $jasperCommand,
  512.     string $fileName,
  513.     string $fileType
  514. )
  515. {
  516.     // display the file name in the text field
  517.     textFieldGrp -e -fileName $fileName exportMapNameField;
  518.     updateResaveButton( $jasperCommand );
  519.  
  520.     // execute the jasper command to load the file
  521.     string $dirName = imageDirectoryName();
  522.  
  523.     eval($jasperCommand + " -e -exportfilename \"" + $fileName + "\" `currentCtx`");
  524.     eval($jasperCommand + " -e -exportfilesave \"" + $dirName + "\" `currentCtx`");
  525.  
  526.     // return true to close the filebrowser
  527.     return true;
  528. }
  529.  
  530.  
  531. global proc jasperImportMapDialog( 
  532.     string $jasperCommand 
  533. ) 
  534. {
  535.     string $cmd = ($jasperCommand + " -q -workspaceisset `currentCtx`" ); 
  536.     int  $isSet = eval( $cmd );
  537.     if ( $isSet == 0 ) {
  538.         string  $workspace = `workspace -q -fn`;
  539.         setWorkingDirectory $workspace "image" "sourceImages";
  540.  
  541.         // set the workspace is set to true
  542.         eval($jasperCommand + " -e -workspaceisset 1 `currentCtx`" );
  543.     }
  544.     
  545.     string $callback = "jasperImportAttributeMapCB " + $jasperCommand + " ";
  546.     fileBrowser( $callback, "Import", "image", 0 );
  547. }
  548.  
  549.  
  550. global proc jasperExportMapDialog( 
  551.     string $jasperCommand 
  552. ) 
  553. {
  554.     string $cmd = ($jasperCommand + " -q -workspaceisset `currentCtx`" ); 
  555.     int    $isSet = eval( $cmd );
  556.     if ( $isSet == 0 ) {
  557.         string  $workspace = `workspace -q -fn`;
  558.         setWorkingDirectory $workspace "image" "sourceImages";
  559.  
  560.         // set the workspace is set to true
  561.         eval($jasperCommand + " -e -workspaceisset 1 `currentCtx`" );
  562.     }
  563.     
  564.     string $callback = "jasperExportAttributeMapCB " + $jasperCommand + " ";
  565.     fileBrowser( $callback, "Export", "map", 1 );
  566. }
  567.  
  568. global proc jasperImportReloadMap( 
  569.     string $jasperCommand 
  570. ) 
  571. {
  572.     string $fileName = eval("textFieldGrp -q -fileName importMapNameField");
  573.     if ( $fileName != "" ) {
  574.         string $dirName = imageDirectoryName();
  575.         eval($jasperCommand + " -e -importfileload \"" + $dirName + "\" `currentCtx`");    
  576.     }
  577. }
  578.  
  579. global proc jasperExportReloadMap( 
  580.     string $jasperCommand 
  581. ) 
  582. {
  583.     string $fileName = eval("textFieldGrp -q -fileName exportMapNameField");
  584.     if ( $fileName != "" ) {
  585.         string $dirName = imageDirectoryName();
  586.         eval($jasperCommand + " -e -exportfilesave \"" + $dirName + "\" `currentCtx`");
  587.     }
  588. }
  589.  
  590. global proc importFileLoad(
  591.     string $jasperCommand
  592. )
  593. {
  594.     // change the reload button if necessary
  595.     updateReloadButton( $jasperCommand );
  596.  
  597.     string $fileName = eval("textFieldGrp -q -fileName importMapNameField");
  598.     if ( $fileName != "" ) {
  599.         // execute the jasper command to load the file
  600.         string $dirName = imageDirectoryName();
  601.         eval($jasperCommand + " -e -importfilename \"" + $fileName + "\" `currentCtx`");
  602.         eval($jasperCommand + " -e -importfileload \"" + $dirName + "\" `currentCtx`");
  603.     }
  604. }
  605.  
  606. global proc exportFileSave(
  607.     string $jasperCommand
  608. )
  609. {
  610.     // change the resave button if necessary
  611.     updateResaveButton( $jasperCommand );
  612.  
  613.     string $fileName = eval("textFieldGrp -q -fileName exportMapNameField");
  614.     if ( $fileName != "" ) {
  615.         // execute the jasper command to save the file
  616.         string $dirName = imageDirectoryName();
  617.         eval($jasperCommand + " -e -exportfilename \"" + $fileName + "\" `currentCtx`");
  618.         eval($jasperCommand + " -e -exportfilesave \"" + $dirName + "\" `currentCtx`");
  619.     }
  620. }
  621.  
  622.  
  623. proc jasperMapCallback( 
  624.     string $jasperCommand,
  625.     string $currentTool
  626. )
  627. {
  628.     //
  629.     //    Import Map frameLayout
  630.     //
  631.     textFieldGrp -e
  632.         -cc ($jasperCommand + " -e -importfilename \"#1\" `currentCtx`; importFileLoad " + $jasperCommand )
  633.         importMapNameField;
  634.  
  635.     button -e 
  636.         -c ( "jasperImportReloadMap \"" + $jasperCommand + "\"" ) 
  637.         importReloadButton;
  638.  
  639.     button -e 
  640.         -c ( "jasperImportMapDialog \"" + $jasperCommand + "\"" ) 
  641.         importMapButton;
  642.  
  643.     checkBoxGrp -e
  644.         -cc1 ($jasperCommand + " -e -importreassign #1 `currentCtx`" ) 
  645.         reassignMapsChkBox;
  646.  
  647.     radioButtonGrp -e
  648.         -on1 ($jasperCommand + " -e -importfilemode \"alpha\" `currentCtx`")
  649.         -on2 ($jasperCommand + " -e -importfilemode \"luminance\" `currentCtx`")
  650.         importMapAlphaValueRadio1;
  651.  
  652.     radioButtonGrp -e
  653.         -on1 ($jasperCommand + " -e -importfilemode \"red\" `currentCtx`")
  654.         -on2 ($jasperCommand + " -e -importfilemode \"green\" `currentCtx`")
  655.         -on3 ($jasperCommand + " -e -importfilemode \"blue\" `currentCtx`")
  656.         importMapAlphaValueRadio2;
  657.  
  658.     if ( attrPaintInstCheckTool($currentTool) ) {
  659.         string $name = eval("attrPaintCtx -q -bcn `currentCtx`");
  660.         if ( $name == "polyClrVertPaint" ) {
  661.             radioButtonGrp -e
  662.                 -on1 ($jasperCommand + " -e -importfilemode \"rgb\" `currentCtx`")
  663.                 -on2 ($jasperCommand + " -e -importfilemode \"rgba\" `currentCtx`")
  664.                 importMapAlphaValueRadio3;
  665.         }
  666.     }
  667.  
  668.  
  669.     if ( $currentTool == "selectPaint" ) {
  670.         floatSliderGrp -e
  671.             -cc ($jasperCommand + " -e -importthreshold #1 `currentCtx`" )    
  672.         importSelectCVThresholdSlider;
  673.     }
  674.  
  675.     //
  676.     //    Export Map frameLayout
  677.     //
  678.     if ( ( $currentTool == "wtPaint" )  || 
  679.          ( $currentTool == "userPaint") ||
  680.          ( $currentTool == "attrPaint") ||
  681.          ( attrPaintInstCheckTool( $currentTool ) ) ||
  682.          ( $currentTool == "selectPaint" ) ) 
  683.     {
  684.         textFieldGrp -e
  685.             -cc ($jasperCommand + " -e -exportfilename \"#1\" `currentCtx`; exportFileSave " + $jasperCommand )
  686.             exportMapNameField;
  687.  
  688.         button -e 
  689.             -c ( "jasperExportReloadMap \"" + $jasperCommand + "\"" ) 
  690.             exportReloadButton;
  691.  
  692.         button -e 
  693.             -c ( "jasperExportMapDialog \"" + $jasperCommand + "\"" ) 
  694.             exportMapButton;
  695.  
  696.         // determine if this is 3d or 1d paint
  697.         //
  698.         string $name = "";
  699.         if ( attrPaintInstCheckTool($currentTool) ) {
  700.             $name = eval("attrPaintCtx -q -bcn `currentCtx`");
  701.         }
  702.     
  703.         // if this is not 3d color paint tool (1d case)
  704.         // 
  705.         if ( $name != "polyClrVertPaint" ) {
  706.             radioButtonGrp -e
  707.                 -on1 ($jasperCommand + " -e -exportfilemode \"alpha\" `currentCtx`")
  708.                 -on2 ($jasperCommand + " -e -exportfilemode \"luminance\" `currentCtx`")
  709.                 exportMapValueRadio1;
  710.         } else {
  711.             radioButtonGrp -e
  712.                 -on1 ($jasperCommand + " -e -exportfilemode \"alpha\" `currentCtx`")
  713.                 -on2 ($jasperCommand + " -e -exportfilemode \"rgb\" `currentCtx`")
  714.                 -on3 ($jasperCommand + " -e -exportfilemode \"rgba\" `currentCtx`")
  715.                 exportMapValueRadio2;
  716.         }
  717.  
  718.         intSliderGrp -e
  719.             -cc ($jasperCommand + " -e -exportfilesizex #1 `currentCtx`; adjustMapSizeSlider " + $jasperCommand + " " + "xSlider")
  720.             exportMapSizeXSlider;
  721.  
  722.         intSliderGrp -e
  723.             -cc ($jasperCommand + " -e -exportfilesizey #1 `currentCtx`; adjustMapSizeSlider " + $jasperCommand + " " + "ySlider")
  724.             exportMapSizeYSlider;
  725.  
  726.         checkBoxGrp -e
  727.             -cc1 ("setAspectRatio " + $jasperCommand ) 
  728.             exportKeepAspectChkBox;
  729.  
  730.         optionMenuGrp -e
  731.             -cc ($jasperCommand + " -e -exportfiletype \"#1\" `currentCtx`")
  732.             imageFormatOptionMenu;
  733.     }
  734. }
  735.  
  736.  
  737. proc jasperDisplayCallback( 
  738.     string $jasperCommand,
  739.     string $currentTool
  740. )
  741. {
  742.     // 
  743.     //    Surface frameLayout
  744.     //    
  745.     string $currentContext  = `currentCtx`;
  746.  
  747.     checkBoxGrp -e
  748.         -cc1 ($jasperCommand + " -e -outline #1 `currentCtx`; updateBrushFeedback " + $jasperCommand )
  749.         drawOutlineChkBox;
  750.  
  751.     checkBoxGrp -e
  752.         -cc1 ($jasperCommand + " -e -brushfeedback #1 `currentCtx`" )
  753.         brushFeedbackChkBox;
  754.  
  755.     checkBoxGrp -e
  756.         -cc1 ($jasperCommand + " -e -outlinepaint #1 `currentCtx`; updateBrushFeedback " + $jasperCommand )
  757.         drawOutlinePaintingChkBox;
  758.  
  759.     checkBoxGrp -e
  760.         -cc1 ($jasperCommand + " -e -showactive #1 `currentCtx`")
  761.         showActiveLinesChkBox;
  762.  
  763.     //
  764.     //    Color feedback frameLayout
  765.     //        - this is only displayed for wtPaint and userPaint tools
  766.     //
  767.     if ( ( $currentTool == "wtPaint" ) || ( $currentTool == "userPaint")
  768.          || $currentTool == "attrPaint" || attrPaintInstCheckTool( $currentTool ) )
  769.     {
  770.         checkBoxGrp -e
  771.             -cc1 ($jasperCommand + " -e -colorfeedback #1 `currentCtx`")
  772.             colorFeedbackChkBox;
  773.         checkBoxGrp -e
  774.             -cc1 ($jasperCommand + " -e -disablelighting #1 `currentCtx`")
  775.             disableLightingChkBox;
  776.         if ( $currentTool == "wtPaint" ) {
  777.             checkBoxGrp -e
  778.                 -cc1 ($jasperCommand + " -e -usesetcolor #1 `currentCtx`")
  779.                 useSetColorChkBox;
  780.         }
  781.  
  782.         floatSliderGrp -e
  783.             -cc ($jasperCommand + " -e -colorrangelower #1 `currentCtx`")
  784.             crLower;
  785.         floatSliderGrp -e
  786.             -cc ($jasperCommand + " -e -colorrangeupper #1 `currentCtx`")
  787.             crUpper;
  788.     }
  789.  
  790.     if ( $currentTool == "setEditPaint" ) {
  791.         checkBoxGrp -e
  792.             -cc1 ($jasperCommand + " -e -setcolorfeedback #1 `currentCtx`" )
  793.             setEditColorFeedbackChkBox;
  794.  
  795.         checkBoxGrp -e
  796.             -cc1 ($jasperCommand + " -e -setdisplaycvs #1 `currentCtx`" )
  797.             setEditDisplayCVsChkBox;
  798.     }
  799. }
  800.  
  801.  
  802. proc jasperMiscCallback( 
  803.     string $jasperCommand 
  804. )
  805. {
  806.     string $currentContext  = `currentCtx`;
  807.     string $currentTool = `contextInfo -c $currentContext`;
  808.  
  809.     // 
  810.     // Multiple Surface Detection frameLayout
  811.     //
  812.     radioButtonGrp -e
  813.         -on1 ($jasperCommand + " -e -multisurface \"infinite\" `currentCtx`; updateInFinite " + $jasperCommand ) 
  814.          -on2 ($jasperCommand + " -e -multisurface \"finite\" `currentCtx`; updateFinite " + $jasperCommand ) 
  815.         multiSurfaceRadio;
  816.  
  817.       intSliderGrp -e
  818.         -cc ($jasperCommand + " -e -multisurfacesize #1 `currentCtx`")
  819.         multiSurfaceSizeSlider;
  820.  
  821.     checkBoxGrp -e
  822.         -cc1 ($jasperCommand + " -e -multisurfacemode #1 `currentCtx`" )
  823.         multiSurfaceModeChkBox;
  824.     updateMultiSurfaceModeChkBox( $jasperCommand );
  825.  
  826.  
  827.     //
  828.     //    Stamp Compensation frameLayout
  829.     //
  830.     radioButtonGrp -e
  831.         -on1 ($jasperCommand + " -e -compensate \"none\" `currentCtx`")
  832.         comp0Radio;
  833.     radioButtonGrp -e
  834.         -on1 ($jasperCommand + " -e -compensate \"linear\" `currentCtx`")
  835.         comp1Radio;
  836.     radioButtonGrp -e
  837.         -on1 ($jasperCommand + " -e -compensate \"grid\" `currentCtx`")
  838.         comp2Radio;
  839.  
  840.     intSliderGrp -e
  841.         -cc ($jasperCommand + " -e -compgridradius #1 `currentCtx`")
  842.         compGridRadius;
  843.  
  844.     //
  845.     //    Paint Type frameLayout
  846.     //
  847.     radioButtonGrp -e
  848.         -on1 ($jasperCommand + " -e -painttype \"projective\" `currentCtx`")
  849.         paintType0Radio;
  850.     radioButtonGrp -e
  851.         -on1 ($jasperCommand + " -e -painttype \"texture\" `currentCtx`")
  852.         paintType1Radio;
  853.     updateReflectionChBox( $jasperCommand );
  854.     updateStampCompensation( $jasperCommand );
  855.  
  856.  
  857.     //
  858.     //    Stroke Smoothing frameLayout
  859.     //
  860.     checkBoxGrp -e
  861.         -cc1 ($jasperCommand + " -e -tsmoothing #1 `currentCtx`")
  862.         texSmoothChkBox;
  863.     checkBoxGrp -e
  864.         -cc1 ($jasperCommand + " -e -ssmoothing #1 `currentCtx`")
  865.         screenSmoothChkBox;
  866.      intSliderGrp -e
  867.         -cc  ($jasperCommand + " -e -ssmoothingiters #1 `currentCtx`")
  868.         divisionSlider;
  869.  
  870.  
  871.     // Pre and Post stroke command frameLayout
  872.     //
  873.     textFieldGrp -e
  874.         -cc ($jasperCommand + " -e -bsc \"#1\" `currentCtx`")
  875.         preStrokeTextField;
  876.     textFieldGrp -e
  877.         -cc ($jasperCommand + " -e -asc \"#1\" `currentCtx`")
  878.         postStrokeTextField;
  879. }
  880.  
  881.  
  882. //
  883. // $jasperMode == "putty", "wtPaint" "userPaint" "selectPaint" 
  884. // $section    == "sculpt"/"weight"/"select"/"script", "stroke"
  885. //                "seam", "mask", "file", "display", "misc"
  886. //
  887. global proc jasperCallback( string $jasperCommand,
  888.                             string $section,
  889.                             string $parent,
  890.                             string $colorSliderCB )
  891. {
  892.  
  893.     string $currentContext  = `currentCtx`;
  894.     string $currentTool     = `contextInfo -c $currentContext`;
  895.  
  896. // OBSOLETE
  897. /*
  898.     if ( $section == "Paint" ) {
  899.         paintColorTabCallback( $jasperCommand, $parent, $currentTool );
  900.     } 
  901.     else if ( $section == "File_Textures" ) {
  902.         paintColorFileCallback( $jasperCommand );
  903.     } 
  904.     else if( $section == "Weight" ) {
  905.         jasperValueCallback( $jasperCommand, $parent, $currentTool, false, "" );
  906.     } 
  907.     else if( $section == "Attr" ) { 
  908.         jasperAttrCallback( $jasperCommand, $currentTool );
  909.     }
  910. */
  911.  
  912.     if( $section == "Sculpt" ) {
  913.         jasperSculptCallback( $jasperCommand, $parent, $currentTool );
  914.     } 
  915. //     else if( $section == "Script_Paint" || $section == "Attr__Paint" ) {
  916.     else if( $section == "Script_Paint" )
  917.     {
  918.         jasperValueCallback( $jasperCommand, $parent, $currentTool, false, "" );
  919.     } 
  920.     else if( $section == "Select" ) {
  921.         jasperSelectCallback( $jasperCommand, $parent, $currentTool);
  922.     } 
  923.     else if( $section == "SetMembership" ) {
  924.         jasperSetEditCallback( $jasperCommand, $parent, $currentTool);
  925.     } 
  926.     else if( $section == "Stroke" ) { 
  927.         jasperStrokeCallback( $jasperCommand, $currentTool );
  928.     }
  929.     else if( $section == "Seam" ) { 
  930.         jasperSeamCallback( $jasperCommand, $currentTool );
  931.     }
  932.     else if( $section == "Mask" ) { 
  933.         jasperMaskCallback( $jasperCommand );
  934.     }
  935.     else if( $section == "Map" ) { 
  936.         jasperMapCallback( $jasperCommand, $currentTool );
  937.     }
  938.     else if( $section == "Display" ) { 
  939. // OBSOLETE
  940. /*
  941.         if ( $currentTool == "paintColor" ) {
  942.             paintColorDisplayCallback( $jasperCommand );
  943.         } else {
  944. */
  945.         jasperDisplayCallback( $jasperCommand, $currentTool );
  946.     }
  947.     else if( $section == "Misc" ) { 
  948. // OBSOLETE
  949. /*
  950.         if ( $currentTool == "paintColor" ) {
  951.             paintColorMiscCallback( $jasperCommand );
  952.         } else {
  953. */
  954.         jasperMiscCallback( $jasperCommand );
  955.     }
  956.     else if( $section == "Setup" ) { 
  957.         jasperSetupCallback( $jasperCommand );
  958.     }
  959.     else {
  960.         attrPaintInstCallbackDefine( 
  961.                 $jasperCommand, $parent, $currentTool, $section 
  962.         );
  963.     }
  964. }
  965.